CREATE OR REPLACE PACKAGE pkg_email
IS

  g_mailhost    VARCHAR2(64) := 'smtp.my.smtp';
  g_sender      VARCHAR2(64) := 'me@me.com';
  g_where_to    VARCHAR2( 400 );
  g_err_message VARCHAR2( 400 );   

  PROCEDURE p_email_message
     ( recipient VARCHAR2
     , cc_recipient VARCHAR2 DEFAULT NULL
     , subject VARCHAR2
     , bodyText VARCHAR2);

END pkg_email;
